home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / vbdatabs / mtank_sh.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  1999-03-17  |  5.1 KB  |  167 lines
  1. // ------------------------------- //
  2. // -------- Start of File -------- //
  3. // ------------------------------- //
  4. // ----------------------------------------------------------- // 
  5. // C++ Source Code File Name: groc_sh.cpp 
  6. // Compiler Used: MSVC40, DJGPP 2.7.2.1, GCC 2.7.2.1, HP CPP 10.24
  7. // Produced By: Doug Gaer 
  8. // File Creation Date: 12/16/1997 
  9. // Date Last Modified: 03/18/1999
  10. // Copyright (c) 1997 Douglas M. Gaer
  11. // ----------------------------------------------------------- // 
  12. // ------------- Program Description and Details ------------- // 
  13. // ----------------------------------------------------------- // 
  14. /*
  15. The VBD C++ classes are copyright (c) 1997, by Douglas M. Gaer.
  16. All those who put this code or its derivatives in a commercial
  17. product MUST mention this copyright in their documentation for
  18. users of the products in which this code or its derivative
  19. classes are used. Otherwise, you have the freedom to redistribute
  20. verbatim copies of this source code, adapt it to your specific
  21. needs, or improve the code and release your improvements to the
  22. public provided that the modified files carry prominent notices
  23. stating that you changed the files and the date of any change.
  24.  
  25. THIS SOFTWARE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND.
  26. THE ENTIRE RISK OF THE QUALITY AND PERFORMANCE OF THIS SOFTWARE
  27. IS WITH YOU. SHOULD ANY ELEMENT OF THIS SOFTWARE PROVE DEFECTIVE,
  28. YOU WILL ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR, OR
  29. CORRECTION.
  30.  
  31. General purpose search functions used with the mtank list
  32. database.
  33. */
  34. // ----------------------------------------------------------- //
  35. #include <stdlib.h>
  36. #include "mtank_sh.h"
  37.  
  38. // Global data structures used to organize and store btree nodes
  39. DLList<MTankInMemCopy> MTankDB_SH_DLList;            // Doubly Linked
  40. DLList<MTankInMemCopy> *dllist = &MTankDB_SH_DLList; // Doubly Linked
  41. DNode<MTankInMemCopy> *dllistptr = 0;                // DLList node pointer
  42. RBTree<MTankInMemCopy> MTankDB_SH_RBTree;            // Red Black tree
  43. RBTree<MTankInMemCopy> *rbtree = &MTankDB_SH_RBTree; // Red Black tree
  44.  
  45. // Variable used to count the number of object found during a search
  46. int ObjectsFound = 0;
  47.  
  48. MTankInMemCopy::MTankInMemCopy(char *k, INT32 oa, INT32 cid)
  49. {
  50.   char date_words[MAXWORDS][MAXWORDLENGTH];
  51.   int num;
  52.   parse(k, date_words, &num, '/');
  53.   date.SetDate(atoi(date_words[0]), atoi(date_words[1]),
  54.            atoi(date_words[2])); 
  55.   object_address = oa;
  56.   class_id = cid;
  57. }
  58.  
  59. void LoadKeys(CachePointer n)
  60. // Visit function used to load the btree nodes into memory
  61. {
  62.   int i = 0;
  63.  
  64.   while (i < n->cnt) {
  65.     MTankInMemCopy buf(n->entry[i].key,
  66.           n->entry[i].object_address,
  67.           n->entry[i].class_id);
  68.  
  69.     rbtree->Add(buf);
  70.     i++;
  71.   }
  72. }
  73.  
  74. void BtreeSearch(CachePointer t, SearchVisitFunc Visit, int item,
  75.                  MarineTank &mtank, UString &str, int find_all) 
  76. // Recursive functions used to search the btree for a specified.
  77. {
  78.   int i;
  79.  
  80.   if ((__LWORD__)t) {
  81.     (*Visit)(t, item, mtank, str, find_all); // Process the node data
  82.     int n = t->cnt;
  83.     CachePointer p(t);
  84.  
  85.     for(i = -1; i < n; i++) {
  86.       p = t->Branch(i);
  87.       t.Release();
  88.         BtreeSearch(p, Visit, item, mtank, str, find_all);  
  89.     }
  90.   }
  91. }
  92.  
  93. void BtreeNodeSearch(CachePointer n, int item, MarineTank &mtank, UString &str,
  94.              int find_all)
  95. // Visit function used to search each node for a specified item
  96. {
  97.   int i = 0;
  98.   int offset;
  99.   UString buf;
  100.  
  101.   if(item == YEAR) {
  102.     while (i < n->cnt) {
  103.       buf = n->entry[i].key;
  104.       
  105.       if(find_all == 0) { // Search for single match
  106.     int result = CaseICmp(buf, str);
  107.     if(result == 0) { 
  108.       MTankInMemCopy inmemcopy(n->entry[i].key,
  109.                   n->entry[i].object_address,
  110.                   n->entry[i].class_id);
  111.       rbtree->Add(inmemcopy);
  112.       ObjectsFound++;
  113.     }
  114.       }
  115.       else { // Search for all matches
  116.     offset = buf.Find(str.c_str(), 0);
  117.     if(offset != UString::NoMatch) {
  118.       MTankInMemCopy inmemcopy(n->entry[i].key,
  119.                    n->entry[i].object_address,
  120.                    n->entry[i].class_id);
  121.       rbtree->Add(inmemcopy);
  122.       ObjectsFound++;
  123.     }
  124.       }
  125.       i++;
  126.     }
  127.   }
  128.   else {
  129.     while (i < n->cnt) {
  130.       mtank.ReadObject(n->entry[i].object_address);
  131.       switch(item) {
  132.     case COMMENTS:
  133.           buf = mtank.GetComments();
  134.       break;
  135.     default:
  136.       return;
  137.       }
  138.       if(find_all == 0) { // Search for single match
  139.     int result = CaseICmp(buf, str);
  140.     if(result == 0) { 
  141.       MTankInMemCopy inmemcopy(n->entry[i].key,
  142.                   n->entry[i].object_address,
  143.                   n->entry[i].class_id);
  144.       rbtree->Add(inmemcopy);
  145.       ObjectsFound++;
  146.     }
  147.       }
  148.       else { // Search for all matches
  149.     offset = buf.Find(str.c_str(), 0);
  150.     if(offset != UString::NoMatch) {
  151.       MTankInMemCopy inmemcopy(n->entry[i].key,
  152.                   n->entry[i].object_address,
  153.                   n->entry[i].class_id);
  154.       rbtree->Add(inmemcopy);
  155.       ObjectsFound++;
  156.     }
  157.       }
  158.       i++;
  159.     }
  160.   }
  161. }
  162. // ----------------------------------------------------------- //
  163. // ------------------------------- //
  164. // --------- End of File --------- //
  165. // ------------------------------- //
  166.  
  167.